* lisp/emacs-lisp/package.el (package--with-response-buffer):

Ensure we're at the start of the buffer before searching for
the end of headers.

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 2aea9d11d1f0c700ae05f0404d27477712573545..d747bc226a74e92370c017e30fd84277a903d4b0 100644 (file)
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1165,6 +1165,7 @@ BODY (does not apply to errors signaled by ERROR-FORM).
                                 (unwind-protect (wrap-errors
                                                  (when-let ((er (plist-get status :error)))
                                                    (error "Error retrieving: %s %S" url er))
+                                                 (goto-char (point-min))
                                                  (unless (search-forward-regexp "^\r?\n\r?" nil 'noerror)
                                                    (error "Error retrieving: %s %S" url "incomprehensible buffer"))
                                                  (with-temp-buffer